home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Format (UK) 188
/
01-04 PC Format 188 [2006-06] DVD side 1_.iso
/
DiscContents
/
Trials
/
Spyware Doctor
/
sdsetup-3.5.1.498h-futurenet.exe
/
{tmp}
/
shutdown.vbs
< prev
Wrap
Text File
|
2005-12-20
|
313b
|
14 lines
Sub ShutDown
nLogOff=0
nReboot=2
nForceLogOff=4
nForceReboot=6
nPowerDown=8
nForcePowerDown=12
Set oOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem")
For Each oOperatingSystem in oOS
oOperatingSystem.Win32Shutdown(nForceReboot)
Next
End sub
ShutDown